home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-03
/
ivb9203.zip
/
BARSTAT.FRM
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1992-02-04
|
3KB
|
130 lines
frmStat
Progress/status box
Form2
txtBarPct
MINIMIZED
NORMALF
MarginV
OFFSET
IconBar?
CurrentXc
ScaleWidth
CurrentYz
IconPie
CenterX
CenterYr
ScaleHeighta
Radiust
FillStyle3
WindowState
AngStart3
ArcAmount
AngEndk
FillColor
IconInitBar
IconInitPie
ForeColor
IconPie2
Form_Click+
Form_Resize
@ Form_Load
mBarPct
mPie1Pct
mPie2Pct
txtBarPct_Changea
txtBarPctE
texty
Form_GotFocus
Resize
PrevWindowStateW
Form_DragDropf
Source
Form_Paint
Form_LostFocus=
Form_DragOver
State
PrevTop
PrevLeft
Form_KeyDown=
KeyCode
ShiftX
Form_DblClick
Form_KeyPress
keyascii
Form_KeyUpZ
Form_LinkCloseN
Form_LinkError
LinkErr
Form_LinkExecute
CmdStrW
Cancel
Form_LinkOpen
Form_MouseDown
Button&
Form_MouseMove
Form_MouseUp
Form_Unload
txtPie1Pct_Change
txtPie1Pct
txtPie2Pct_Change.
txtPie2Pct
BLACK
GREENj
gBLACK
gBLUE
gGREEN
gCYAN
gMAGENTAz
gYELLOW
gWHITE
YELLOW
WHITE
MAGENTA
GRAYa
LIGHTBLUE
LIGHTGREEN
LIGHTCYAN
LIGHTRED
LIGHTMAGENTAo
LIGHTYELLOW
BRIGHTWHITE
mPrevWindowStateP
AutoRedraw3
TRUEl
FALSEB
frmStat
Initialize
mPrevLeft
mPrevTop
NewWindowState
CheckForMovedIcon
CalcAngles
Percent
StartAngle
EndAngle
Initiali(
Timer1_Timer
Timer1
EnabledR
Initialized
Initializing^
FALSEEnd
mInitializing
DrawBackground
Get a window border
Form_Load
txtBarPct_Change
Initialize the status form
Common initialization tasksu
Force redrawing when minimized since Paint event doesn't
pick up invalidated minimized formsr
DRAW BAR
Erase previous value
Initialize
Call to paint form after showingw
DrawBackground
Set custom scale width
Set custom scale heighta
Draw a colored icon frameh
Form_Paint